﻿Imports System
Imports System.Configuration
Imports System.Data
Imports System.Linq
Imports System.Web
Imports System.Web.Security
Imports System.Web.UI
Imports System.Web.UI.HtmlControls
Imports System.Web.UI.WebControls
Imports System.Web.UI.WebControls.WebParts
Imports System.Xml.Linq
Imports facebook
Imports Facebook.Web

Partial Public Class Default2
    Inherits System.Web.UI.Page
    Protected Sub Page_Load(ByVal sender As Object, ByVal e As EventArgs)
        'If ConnectAuthentication.isConnected() Then
        '    Dim session As Facebook.Session.FacebookSession = 

        '    session.ApplicationKey = ConnectAuthentication.SessionKey
        '    session.SessionKey = ConnectAuthentication.SessionKey
        '    session.ApplicationSecret = ConnectAuthentication.SecretKey
        '    session.UserId = ConnectAuthentication.UserID

        '    'Display user data captured from the Facebook API.

        '    Dim user As Facebook.Schema.user = New Facebook.Schema.user()
        '    Dim fullName As String = user.first_name & " " & user.last_name

        '    lblName.Text = fullName
        'Else
        '    'Facebook Connect not authenticated, proceed as usual.
        'End If
    End Sub
End Class
